home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 October / EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso / Aminet / comm / xeno / lastuser.lha / LastUsers / Install.s next >
AmigaDOS Script File  |  1995-04-01  |  3KB  |  99 lines
  1. .key logpassword,node1,node2
  2. .bra {
  3. .ket }
  4.  
  5. ;;
  6. ;; Install script for LastUsers v2.5
  7. ;;
  8. ;; This script will install LastUsers for one or two nodes only.
  9. ;; Read the doc file for more information.
  10. ;; 
  11. ;; To run this script, execute it from CLI
  12. ;; This script needs OS version 3.0 or later.
  13. ;;
  14. ;; To use LastUsers on your system you must start
  15. ;; MT with the LOGPASSWORD=yourpass option.
  16. ;; Give this password as an argument to this script.
  17. ;;
  18. ;; Usage: Install.s LOGPASSWORD NODE1 NODE2
  19.  
  20. VERSION >NIL: graphics.library 39
  21. IF NOT WARN
  22.   VERSION >NIL: graphics.library 40
  23.   IF WARN
  24.     ECHO "This Script need OS 3.0 or later."
  25.     QUIT
  26.     ENDIF
  27.   ENDIF
  28.  
  29. ECHO " *NThis will install *E[1mLastUsers*E[0m to your system."
  30. ECHO "To use *E[1mLastUsers*E[0m on your system you must start"
  31. ECHO "MT with the LOGPASSWORD=yourpass option."
  32. ECHO "Give this password as an argument to this script."
  33. ECHO "This script needs the XENOLINK: assign."
  34. ECHO "This script will modify your XENOLINK:Scripts/Logout.1 script."
  35. ECHO "*NYou might want to first run the script"
  36. ECHO "Sample.s for sample *E[1mLastUsers*E[0m output."
  37. ECHO "*NTo install *E[1mLastUsers*E[0m for one node run this"
  38. ECHO "script like this: 'Install.s mypass 1' to install"
  39. ECHO "*E[1mLastUsers*E[0m to your node number 1.*N"
  40. ECHO "For two nodes: 'Install.s mypass 1 2' to install"
  41. ECHO "*E[1mLastUsers*E[0m to your nodes 1 and 2.*N"
  42. ASK "Press [Enter] to continue."
  43.  
  44. IF NOT {logpassword}
  45.   ECHO "Usage: Install.s LOGPASSWORD NODE1 [NODE2]"
  46.   QUIT
  47.   ENDIF
  48.  
  49. IF NOT {node1}
  50.   ECHO "Usage: Install.s LOGPASSWORD NODE1 [NODE2]"
  51.   QUIT
  52.   ENDIF
  53.  
  54. IF NOT WARN
  55.  
  56.   ECHO "*NNow select the form file to use.  Different form files"
  57.   ECHO "produce different kinds of output."
  58.  
  59.   REQUESTFILE PATTERN=#?form#?gr1 TITLE="Select which form file to install" FILE=LastForm.gr1 DRAWER=Forms >ENV:lastu
  60.  
  61.   IF $lastu EQ ""
  62.     SETENV lastu "LastForm.gr1"
  63.     ENDIF
  64.  
  65.   COPY $lastu XENOLINK:LastForm.gr1
  66.  
  67.   COPY LastUsers C:
  68.  
  69.   COPY LastQuotes.txt XENOLINK:
  70.  
  71.   COPY NoLastUsers.txt XENOLINK:
  72.  
  73.   IF NOT {NODE2}
  74.     ECHO >>XENOLINK:Scripts/Logout.1 "UnlockLogs {logpassword}"
  75.     ECHO >>XENOLINK:Scripts/Logout.1 "LastUsers -o*"XENOLINK:Text/1/LastUsers*" -{NODE1} -aa -s"
  76.     ECHO >>XENOLINK:Scripts/Logout.1 "LockLogs {logpassword}"
  77.   ELSE
  78.     ECHO >>XENOLINK:Scripts/Logout.1 "UnlockLogs {logpassword}"
  79.     ECHO >>XENOLINK:Scripts/Logout.1 "LastUsers -o*"XENOLINK:Text/1/LastUsers*" -{NODE1} -{NODE2} -aa -s"
  80.     ECHO >>XENOLINK:Scripts/Logout.1 "LockLogs {logpassword}"
  81.     ECHO >>XENOLINK:Scripts/Logout.2 "UnlockLogs {logpassword}"
  82.     ECHO >>XENOLINK:Scripts/Logout.2 "LastUsers -o*"XENOLINK:Text/1/LastUsers*" -{NODE2} -{NODE1} -aa -s"
  83.     ECHO >>XENOLINK:Scripts/Logout.2 "LockLogs {logpassword}"
  84.     ENDIF
  85.  
  86.   ECHO "*N*E[1mLastUsers*E[0m is now installed.*N"
  87.  
  88.   IF NOT {NODE2}
  89.     ECHO "Every time a user logs off your node {NODE1}, two text files"
  90.   ELSE
  91.     ECHO "Every time a user logs off your node {NODE1} or node {NODE2}, two text files"
  92.     ENDIF
  93.  
  94.   ECHO "XENOLINK:Text/1/LastUsers and XENOLINK:Text/0/LastUsers"
  95.   ECHO "are created.  It is up to you to display these text files"
  96.   ECHO "somewhere in your BBS.*N"
  97.  
  98.   ENDIF
  99.